1 FORI=46345TO47103STEP2:POKEI,O:NEXT:FORI=1TO255:A$=A$+CHR$(95*RND(1)+33):NEXT
2 POKE618,10:POKE619,10:CLS:FORI=1TO10000:PRINTA$;:NEXT